home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The X-Philes (2nd Revision)
/
The X-Philes Number 1 (1995).iso
/
xphiles
/
hp48hor1
/
circuit
< prev
next >
Wrap
Text File
|
1995-03-31
|
4KB
|
3 lines
HPHP48-A *δ░ä CLIST -àa#t*° ½û ,*½û1 #t*@+*+1p L2 c#+1 PRIM t*ࢠäDÄ¢ δ$Å¢ █ö$Å¢ àôDÅ¢ TeÄ¢ █ Ä¢ àôÄ¢ 0Ä'' PD 4$öTDù 6 ½ φû±÷ É¢ D ÇAe#H.`D 44äD g#ô L#m.p &wÆ 6Gxæ locmac 6²÷ {ï ½ á4òæ extrnm.@0 &7æa#É¢òæ circ,É #m. Öæ circm. f| b¢ â ,É #m. v, m. f| ûa, ~A."3*ré¡ï" -Dæ extrn)üA« ~A.B+*ré¡ï" -°° É¢ â ,É ,* á ,*p .g«Ñæ locmac ëq ,*p 'g«±÷ m. Ö» ô± µ/òù m.PP G'çÖ» 'êÑæ arglist½ûa| m. Ö» ô± Ö/² Ö/â$#H.p0ôôt DUÄ$#b5â_#96² « `à ôTäâd@ H. D ä NH. ä S1.1H.@0 ~a ä SH.@0$~a ä C+1@ CIRCUIT.L t*@ ,*° CLK £ò1*É¢² t*ࢠ0Ä'4 3) à-*+1@ ,*° CLK3) 0 ó¢² t*ࢠ█ö$ ,*b¢ 0*+1@ ,*° ANDÉ¢â-* £² t*ࢠ█ö$5/* £"3*+1@ ,*° ANDó¢ 0*G£² t*ࢠδ$Ö1*G£â5*+1° | @àTt5DDù 6B +1p, T6 ä CIRCUIT.Ly6òì T6 ä NAME.Ly6òì '¢Be#H.`D 44äD g#í c#+1
ADDNAME -àa#H.`à ôTäâ â 'êq, ~A.B+*ré¡ï" -█½ H.`à ôTäâô» g«q, T6 ä NAME.Ly6òì ,ɱ µ/òù ½û ½ +1P'y"96² ò p0ôôt DUtDù 6r, ,É â É¢b| H.@ % ô â 'ê1ì"'¢" ú. ä MACROµ/òù É¢2x ½ûá-*½û #m. â m. f| ûa, ~A."3*ré¡ï"H.p DDä ôTT'y"É¢2x g«á$#½û ½ É¢2x H. 0 $5T Dåâô» g«Ae#H. 0 $5T Dåâ g#í ² Ö/ c#+1` INIT -àa#H.`à ôTäâ H.P0Ä 4Eu, T6 ä STATEy6òì T6 ä STATE.NEWy6òì '¢Be#H. 0E DUä2äD g#í c#+10 STATE.NEW t* ,*É¢B+*'¢ ,*'¢B+*É¢² H 0E DUä2äD 0 + @@$TeDDù 6r, b¢b| H.P0E DUô» ÆxÑ» ó¢b| H. 0E DUäâTt5/*DüÑ» ôAe#H. 0E DUäâTt g#í c#+1à
DNOT -àa# ûá-*Æx ä STATE½ûa| èÑ» ó¢b| H. 0E DUäâTt5/*DüÑ» ôAe#H. 0E DUäâTt g#í c#+10 DAND -àa# ûá-*Æx ä STATE½ûa| )ü1/*Æx ä STATE½ûa| çÑ» £b| H. 0E DUäâTt5/*DüÑ» ôAe#H. 0E DUäâTt g#í c#+1D DOR -àa# ûá-*Æx ä STATE½ûa| )ü1/*Æx ä STATE½ûa| èÑ» £b| H. 0E DUäâTt5/*DüÑ» ôAe#H. 0E DUäâTt g#í c#+1° DXOR -àa# ûá-*Æx ä STATE½ûa| )ü1/*Æx ä STATE½ûa| öèÑ» £b| H. 0E DUäâTt5/*DüÑ» ôAe#H. 0E DUäâTt g#í c#+1D DHI -àa#b¢b| T6 ä STATE.NEWy6ò» É¢r@ 96² Z 0@Äô4Dù 6â-*ÆxAe#H. 0E DUäâTt g#½ûA+* ô c#+1 DCLK -àa# ûq, b¢b| ½û1/*Æx L#m. àÖæ m 6 ä STATE.CNTm. àÖæ mg«Ñä m. àù ½û 0*ÆxÑ» H. 0E DUäâTt5/*Düq@ T6 ä STATE.NEWy6òì b5 c#+1° STATE t* ,*É¢B+*'¢ ,*'¢B+*É¢² @ 0@Ö 5@ t*ࢠ0Ä'ô1* £ ä R+1@ ,*° CLK3) 0 H. µ t*ࢠ0Ä'4 3) █ä P+1@ ,*° MUXH. ä QH. ä S+1° █à E5E DU Dù 6 ,*H. 0 $5T Dåâ 1òæ iH. 0 $5T Dåâôæ iÆxq, É¢b| ,*p D½ûq {ïá$#T6 ä STATE.CNTy6B φû ä STATE.NEWT6 ä STATEy6òì 96² PδTEåâT@ H. D ä NH. ä SH. 0' E @ $E@ w) e 1y P H. █E+*w) f H. µ ¡ P@ DÅTTDù 6ò% t*à à à ° t*à à à δ ° ~a ä OUT.L,Éá5*~a¼ ,*½û #m. ä OUT.Lm. f| ëq, ,É ,* á-*½ûá û £2î É¢ò» \èá-*åÑæ iÉ¢ D \£âb á D» b¢2x ½ûaC ó¢ í Väá$#t*à à ° δâ c#+1 MACCNT 3) 0P MUX t*@ H.00UÄ ä AH. ä Y+1@ t*ࢠàôD ä SELH. à4µ t*ࢠäD ä AH. à4 ä YA+1@ ,*° ANDH. ä SELH. %' t*ࢠδ$ ä YAH. % ä Y+1° +1D MUX4 t*@ H. ä BH. 0 ä DH. 0 ä SBH. µ t*@ ,*° MUXH. 0 ä AH. ä YA+1@ ,*° MUXH. 0 ä CH. @ ä YB+1@ ,*° MUXH. 0% ä YAH. % ä Y+1° +1P COMPILE -àa#H.@àTt5 ' û á4òæ cirm.00 |ça#É¢òæ siz 1òæ im.00 &xæ iÆx ä COMGATEL2â_#96² â PàôDT4UDù 6Be#H.PδTEåâ g#í c#+1 ALL -àa#H.`à ôTäâ ä NODES96² B 00 ô4Dù 6 ä INITH.P@ DÅT ,*½û #m. ä NXTSTATEÉ¢ ä OUT.L,É #m. ä OUT.Lm. f| H.`à ôTäâô» 'ê ä STATE½ûa| Å£âb 2£r m. ,* á5*îq Ñæ j3) )p Ñ» b¢2x ~aá$#L2r4*¥A+* ½ æ c#+1à HADD t*@ H. ä BH.00UÖ ä CARRY+1@ t*ࢠ█ö$ ä AH. ä SUM+1@ ,*° ANDH. ä BH.P0 $% µ +1° D @` DDD@ t*█ä AH. ä CINH.00UÖ ä COUT+1@ t*ࢠ█ DD ä AH. ä S1H. 0 3 t*ࢠ█ DD ä CINH. 0 ä SUMH. 0$3 t*ࢠδ$ ä C1H. 0$ ä COUT+1° +1 DEMO t*@ ,*° CLK £ò1*H. D' t*ࢠ0Ä'4 3) █ä N+1@ ,*° CLK3) 0 H. µ t*ࢠ` DD ä MH. à ä PH. 0 ä C+1°